home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1989 February / Ahoy_Magazine_89-02_1989_Double_L.d64 / Blind Border (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  799b  |  23 lines
  1. 5 fort=8192to8255:readr:poket,r:next:fort=49152to49231:readr:poket,r:next
  2. 10 v=53248:print"[147]":poke16383,0:poke2040,128:pokev,160:pokev+21,1:pokev+28,1
  3. 15 poke v+37,3:pokev+38,4:pokev+39,7:pokev+32,0:pokev+33,11:sys49152
  4. 20 fort=0to255:pokev+1,t:fori=1to3:next:next:goto20
  5. 25 data 0,0,0,0,0,0,0,48
  6. 30 data 0,0,48,0,4,212,64,8
  7. 35 data 212,128,8,212,128,13,247,192
  8. 40 data 53,231,80,53,215,80,54,214
  9. 45 data 80,218,214,148,234,214,164,233
  10. 50 data 215,172,229,215,108,213,215,92
  11. 55 data 212,212,84,208,212,20,208,48
  12. 60 data 20,192,0,4,173,0,0,0
  13. 65 data 120,169,37,160,192,141,20,3
  14. 70 data 140,21,3,169,127,160,19,141
  15. 75 data 13,220,140,17,208,169,50,162
  16. 80 data 1,160,0,141,18,208,142,26
  17. 85 data 208,132,251,88,96,169,1,141
  18. 90 data 25,208,165,251,208,17,169,27
  19. 95 data 162,248,160,1,141,17,208,142
  20. 100 data 18,208,132,251,76,49,234,169
  21. 105 data 19,162,50,160,0,141,17,208
  22. 110 data 142,18,208,132,251,76,188,254
  23.